home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / utmisc1 / esclc20f.lha / EasyRexx / SetWidth.erex < prev    next >
Text File  |  1996-03-31  |  198b  |  14 lines
  1. /* EasyCalc 2.0 Arexx Script */
  2.  
  3. options results
  4.  
  5. 'getnumber "Enter the new width for all columns:" "10" "600"'
  6.  
  7. newwidth = result
  8.  
  9. easytofront
  10.  
  11. do column=0 for 256
  12.   'colwidth' column newwidth
  13. end
  14.